object Form_TambahPemilih: TForm_TambahPemilih
  Left = 105
  Top = 86
  BorderStyle = bsSingle
  Caption = 'Tambah Data Pemilih'
  ClientHeight = 515
  ClientWidth = 1148
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 0
    Top = 33
    Width = 1148
    Height = 393
    Align = alClient
    Caption = 
      'Data pemilih yang ditambahkan (Tabel atas merupakan contoh pengi' +
      'sian)'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 0
    object cxGrid1: TcxGrid
      Left = 2
      Top = 55
      Width = 1144
      Height = 311
      Align = alClient
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      object cxGrid1DBTableView1: TcxGridDBTableView
        NavigatorButtons.ConfirmDelete = False
        DataController.Summary.DefaultGroupSummaryItems = <>
        DataController.Summary.FooterSummaryItems = <>
        DataController.Summary.SummaryGroups = <>
      end
      object cxGrid1TableView1: TcxGridTableView
        OnKeyPress = cxGrid1TableView1KeyPress
        NavigatorButtons.OnButtonClick = cxGrid1TableView1NavigatorButtonsButtonClick
        NavigatorButtons.ConfirmDelete = False
        NavigatorButtons.First.Visible = False
        NavigatorButtons.PriorPage.Enabled = False
        NavigatorButtons.PriorPage.Visible = False
        NavigatorButtons.Prior.Enabled = False
        NavigatorButtons.Prior.Visible = False
        NavigatorButtons.Next.Visible = False
        NavigatorButtons.NextPage.Visible = False
        NavigatorButtons.Last.Visible = False
        NavigatorButtons.Insert.Visible = False
        NavigatorButtons.Delete.Visible = True
        NavigatorButtons.Edit.Visible = False
        NavigatorButtons.Post.Visible = True
        NavigatorButtons.Refresh.Visible = False
        NavigatorButtons.SaveBookmark.Enabled = False
        NavigatorButtons.SaveBookmark.Visible = False
        NavigatorButtons.GotoBookmark.Visible = False
        NavigatorButtons.Filter.Visible = False
        OnCustomDrawCell = cxGrid1TableView1CustomDrawCell
        OnEditKeyDown = cxGrid1TableView1EditKeyDown
        DataController.Summary.DefaultGroupSummaryItems = <>
        DataController.Summary.FooterSummaryItems = <>
        DataController.Summary.SummaryGroups = <>
        DataController.OnDataChanged = cxGrid1TableView1DataControllerDataChanged
        DataController.OnRecordChanged = cxGrid1TableView1DataControllerRecordChanged
        DateTimeHandling.DateFormat = 'dd/MM/yyyy'
        NewItemRow.Visible = True
        OptionsData.Appending = True
        OptionsView.Navigator = True
        OptionsView.GroupByBox = False
        object cxGrid1TableView1Column1: TcxGridColumn
          Caption = 'NIK*'
        end
        object cxGrid1TableView1Column2: TcxGridColumn
          Caption = 'NKK'
        end
        object cxGrid1TableView1Column3: TcxGridColumn
          Caption = 'Nama Lengkap*'
          Width = 90
        end
        object cxGrid1TableView1Column4: TcxGridColumn
          Caption = 'Tempat Lahir'
          Width = 59
        end
        object cxGrid1TableView1Column5: TcxGridColumn
          Caption = 'Tanggal lahir*'
          Width = 73
        end
        object cxGrid1TableView1Column7: TcxGridColumn
          Caption = 'Jenis Kelamin*'
          Width = 80
        end
        object cxGrid1TableView1Column8: TcxGridColumn
          Caption = 'Status Perkawinan*'
          Width = 104
        end
        object cxGrid1TableView1Column9: TcxGridColumn
          Caption = 'Nama Ibu'
        end
        object cxGrid1TableView1Column10: TcxGridColumn
          Caption = 'Agama'
        end
        object cxGrid1TableView1Column12: TcxGridColumn
          Caption = 'Alamat'
        end
        object cxGrid1TableView1Column14: TcxGridColumn
          Caption = 'RT*'
        end
        object cxGrid1TableView1Column13: TcxGridColumn
          Caption = 'RW*'
        end
        object cxGrid1TableView1Column15: TcxGridColumn
          Caption = 'Dusun'
        end
        object cxGrid1TableView1Column6: TcxGridColumn
          Caption = 'Penyandang Cacat'
          Width = 67
        end
        object cxGrid1TableView1Column20: TcxGridColumn
          Caption = 'TPS'
        end
        object cxGrid1TableView1Column11: TcxGridColumn
          Caption = 'Status Pemilih'
          PropertiesClassName = 'TcxComboBoxProperties'
          Properties.Items.Strings = (
            'Biasa')
          Visible = False
        end
        object cxGrid1TableView1Column16: TcxGridColumn
          Caption = 'Pekerjaan'
          PropertiesClassName = 'TcxComboBoxProperties'
          Properties.Items.Strings = (
            'Pelajar'
            'Pengurus RT'
            'Pensiunan'
            'Belum/Tidak Bekerja'
            'Petani'
            'Peternak'
            'Nelayan'
            'Industri'
            'Konstruksi'
            'Perdagangan'
            'Transportasi'
            'PNS'
            'Jasa Lainnya')
          Visible = False
        end
        object cxGrid1TableView1Column17: TcxGridColumn
          Caption = 'Pendidikan'
          PropertiesClassName = 'TcxComboBoxProperties'
          Properties.Items.Strings = (
            'Tidak/Belum Sekolah'
            'Tamat SD'
            'Tidak Tamat SD'
            'SLTP'
            'SLTA'
            'D I/II'
            'D III'
            'S 1/D IV'
            'S 2'
            'S 3')
          Visible = False
        end
        object cxGrid1TableView1Column18: TcxGridColumn
          Caption = 'Status Rumah Tangga'
          PropertiesClassName = 'TcxComboBoxProperties'
          Properties.Items.Strings = (
            'Kepala RT'
            'Istri/Suami'
            'Anak'
            'Menantu'
            'Cucu'
            'Orang Tua'
            'Mertua'
            'Famili Lain'
            'Pembantu'
            'Lain-lain')
          Visible = False
        end
        object cxGrid1TableView1Column19: TcxGridColumn
          Caption = 'Warga Negara'
          PropertiesClassName = 'TcxComboBoxProperties'
          Properties.Items.Strings = (
            'Indonesia'
            'Asing')
          Visible = False
        end
      end
      object cxGrid1Level1: TcxGridLevel
        GridView = cxGrid1TableView1
      end
    end
    object Panel3: TPanel
      Left = 2
      Top = 366
      Width = 1144
      Height = 25
      Align = alBottom
      TabOrder = 1
      object Label1: TLabel
        Left = 8
        Top = 4
        Width = 129
        Height = 13
        Caption = 'Jumlah pemilih tambahan : '
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
      end
      object lblJml: TLabel
        Left = 143
        Top = 4
        Width = 18
        Height = 13
        Caption = 'xxx'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
      end
      object cboPilgub: TCheckBox
        Left = 1032
        Top = 4
        Width = 97
        Height = 17
        Caption = 'Data Pilgub'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
      end
    end
    object cxGrid2: TcxGrid
      Left = 2
      Top = 15
      Width = 1144
      Height = 40
      Align = alTop
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      object cxGridDBTableView1: TcxGridDBTableView
        NavigatorButtons.ConfirmDelete = False
        DataController.Summary.DefaultGroupSummaryItems = <>
        DataController.Summary.FooterSummaryItems = <>
        DataController.Summary.SummaryGroups = <>
      end
      object cxGridTableView1: TcxGridTableView
        OnKeyPress = cxGrid1TableView1KeyPress
        NavigatorButtons.OnButtonClick = cxGrid1TableView1NavigatorButtonsButtonClick
        NavigatorButtons.ConfirmDelete = False
        NavigatorButtons.First.Visible = False
        NavigatorButtons.PriorPage.Enabled = False
        NavigatorButtons.PriorPage.Visible = False
        NavigatorButtons.Prior.Enabled = False
        NavigatorButtons.Prior.Visible = False
        NavigatorButtons.Next.Visible = False
        NavigatorButtons.NextPage.Visible = False
        NavigatorButtons.Last.Visible = False
        NavigatorButtons.Insert.Visible = False
        NavigatorButtons.Delete.Visible = True
        NavigatorButtons.Edit.Visible = False
        NavigatorButtons.Post.Visible = True
        NavigatorButtons.Refresh.Visible = False
        NavigatorButtons.SaveBookmark.Enabled = False
        NavigatorButtons.SaveBookmark.Visible = False
        NavigatorButtons.GotoBookmark.Visible = False
        NavigatorButtons.Filter.Visible = False
        OnEditKeyDown = cxGrid1TableView1EditKeyDown
        DataController.Summary.DefaultGroupSummaryItems = <>
        DataController.Summary.FooterSummaryItems = <>
        DataController.Summary.SummaryGroups = <>
        DateTimeHandling.DateFormat = 'dd/MM/yyyy'
        OptionsCustomize.ColumnFiltering = False
        OptionsData.Deleting = False
        OptionsData.Editing = False
        OptionsData.Inserting = False
        OptionsView.ScrollBars = ssNone
        OptionsView.GroupByBox = False
        object cxGridColumn1: TcxGridColumn
          Caption = 'NIK*'
        end
        object cxGridColumn2: TcxGridColumn
          Caption = 'NKK'
        end
        object cxGridColumn3: TcxGridColumn
          Caption = 'Nama Lengkap*'
          Width = 90
        end
        object cxGridColumn4: TcxGridColumn
          Caption = 'Tempat Lahir'
          Width = 59
        end
        object cxGridColumn5: TcxGridColumn
          Caption = 'Tanggal lahir*'
          Width = 73
        end
        object cxGridColumn6: TcxGridColumn
          Caption = 'Jenis Kelamin*'
          Width = 80
        end
        object cxGridColumn7: TcxGridColumn
          Caption = 'Status Perkawinan*'
          Width = 104
        end
        object cxGridColumn8: TcxGridColumn
          Caption = 'Nama Ibu'
        end
        object cxGridColumn9: TcxGridColumn
          Caption = 'Agama'
        end
        object cxGridColumn10: TcxGridColumn
          Caption = 'Alamat'
        end
        object cxGridColumn11: TcxGridColumn
          Caption = 'RT*'
        end
        object cxGridColumn12: TcxGridColumn
          Caption = 'RW*'
        end
        object cxGridColumn13: TcxGridColumn
          Caption = 'Dusun'
        end
        object cxGridColumn14: TcxGridColumn
          Caption = 'Penyandang Cacat'
          Width = 67
        end
        object cxGridTableView1Column1: TcxGridColumn
          Caption = 'TPS'
        end
        object cxGridColumn15: TcxGridColumn
          Caption = 'Status Pemilih'
          PropertiesClassName = 'TcxComboBoxProperties'
          Properties.Items.Strings = (
            'Biasa')
          Visible = False
        end
        object cxGridColumn16: TcxGridColumn
          Caption = 'Pekerjaan'
          PropertiesClassName = 'TcxComboBoxProperties'
          Properties.Items.Strings = (
            'Pelajar'
            'Pengurus RT'
            'Pensiunan'
            'Belum/Tidak Bekerja'
            'Petani'
            'Peternak'
            'Nelayan'
            'Industri'
            'Konstruksi'
            'Perdagangan'
            'Transportasi'
            'PNS'
            'Jasa Lainnya')
          Visible = False
        end
        object cxGridColumn17: TcxGridColumn
          Caption = 'Pendidikan'
          PropertiesClassName = 'TcxComboBoxProperties'
          Properties.Items.Strings = (
            'Tidak/Belum Sekolah'
            'Tamat SD'
            'Tidak Tamat SD'
            'SLTP'
            'SLTA'
            'D I/II'
            'D III'
            'S 1/D IV'
            'S 2'
            'S 3')
          Visible = False
        end
        object cxGridColumn18: TcxGridColumn
          Caption = 'Status Rumah Tangga'
          PropertiesClassName = 'TcxComboBoxProperties'
          Properties.Items.Strings = (
            'Kepala RT'
            'Istri/Suami'
            'Anak'
            'Menantu'
            'Cucu'
            'Orang Tua'
            'Mertua'
            'Famili Lain'
            'Pembantu'
            'Lain-lain')
          Visible = False
        end
        object cxGridColumn19: TcxGridColumn
          Caption = 'Warga Negara'
          PropertiesClassName = 'TcxComboBoxProperties'
          Properties.Items.Strings = (
            'Indonesia'
            'Asing')
          Visible = False
        end
      end
      object cxGridLevel1: TcxGridLevel
        GridView = cxGridTableView1
      end
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 426
    Width = 1148
    Height = 89
    Align = alBottom
    TabOrder = 1
    object Label2: TLabel
      Left = 8
      Top = 12
      Width = 85
      Height = 13
      Caption = 'Import dari Excel:'
    end
    object Label25: TLabel
      Left = 8
      Top = 68
      Width = 452
      Height = 13
      Caption = 
        '*) Harus Diisi (untuk NIK dapat diisi dengan "0" atau "-" jika m' +
        'emang tidak ada)'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Labelcuy: TLabel
      Left = 488
      Top = 68
      Width = 239
      Height = 13
      Caption = 'Periksa Data yang Telah Dimasukkan dengan Teliti'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
    end
    object labelTunggu: TLabel
      Left = 784
      Top = 32
      Width = 130
      Height = 13
      Caption = 'Mohon Tunggu Sebentar...'
      Visible = False
    end
    object fileloc: TEdit
      Left = 8
      Top = 28
      Width = 609
      Height = 21
      TabOrder = 0
    end
    object Button1: TButton
      Left = 624
      Top = 24
      Width = 75
      Height = 25
      Caption = 'Browse..'
      TabOrder = 1
      OnClick = Button1Click
    end
    object prvbtn: TButton
      Left = 704
      Top = 24
      Width = 75
      Height = 25
      Caption = 'Tampilkan'
      TabOrder = 2
      OnClick = prvbtnClick
    end
    object btnTambah: TButton
      Left = 736
      Top = 56
      Width = 75
      Height = 25
      Caption = 'Tambahkan'
      TabOrder = 3
      OnClick = btnTambahClick
    end
    object btnBatal: TButton
      Left = 816
      Top = 56
      Width = 49
      Height = 25
      Caption = 'Batal'
      TabOrder = 4
      OnClick = btnBatalClick
    end
    object Memo1: TMemo
      Left = 272
      Top = -24
      Width = 193
      Height = 57
      Lines.Strings = (
        'Memo1')
      TabOrder = 5
      Visible = False
    end
    object btnCek: TButton
      Left = 872
      Top = 56
      Width = 75
      Height = 25
      Caption = 'Cek Data'
      TabOrder = 6
      Visible = False
      OnClick = btnCekClick
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 0
    Width = 1148
    Height = 33
    Align = alTop
    TabOrder = 2
    object lblKabkot: TLabel
      Left = 8
      Top = 8
      Width = 43
      Height = 13
      Caption = 'lblKabkot'
    end
    object lblKec: TLabel
      Left = 232
      Top = 8
      Width = 27
      Height = 13
      Caption = 'lblKec'
    end
    object lblDesa: TLabel
      Left = 464
      Top = 8
      Width = 34
      Height = 13
      Caption = 'lblDesa'
    end
  end
  object ZConnection1: TZConnection
    Left = 552
  end
  object ZQuery1: TZQuery
    Params = <>
    Left = 520
  end
  object ZTable1: TZTable
    Left = 592
  end
  object ZQuery2: TZQuery
    Params = <>
    Left = 624
  end
  object Timer1: TTimer
    OnTimer = Timer1Timer
    Left = 496
    Top = 424
  end
  object qryCek: TZQuery
    Params = <>
    Left = 664
    Top = 8
  end
  object OpenDialog1: TOpenDialog
    Left = 320
    Top = 392
  end
  object JvThread2: TJvThread
    Exclusive = True
    MaxCount = 0
    RunOnCreate = True
    FreeOnTerminate = True
    OnExecute = JvThread2Execute
    OnFinishAll = JvThread2FinishAll
    Left = 144
    Top = 376
  end
  object JvThreadSimpleDialog2: TJvThreadSimpleDialog
    DialogOptions.FormStyle = fsNormal
    DialogOptions.ShowDialog = True
    DialogOptions.CancelButtonCaption = 'Cancel'
    DialogOptions.Caption = 'Preview Excel'
    DialogOptions.EnableCancelButton = False
    DialogOptions.InfoText = 'Harap tunggu sebentar...'
    DialogOptions.ShowProgressBar = True
    Left = 224
    Top = 376
  end
  object JvThread1: TJvThread
    Exclusive = True
    MaxCount = 0
    RunOnCreate = True
    FreeOnTerminate = True
    OnExecute = JvThread1Execute
    OnFinishAll = JvThread1FinishAll
    Left = 296
    Top = 376
  end
  object JvThreadSimpleDialog1: TJvThreadSimpleDialog
    DialogOptions.FormStyle = fsNormal
    DialogOptions.ShowDialog = True
    DialogOptions.CancelButtonCaption = 'Cancel'
    DialogOptions.Caption = 'Preview Excel'
    DialogOptions.EnableCancelButton = False
    DialogOptions.InfoText = 'Harap tunggu sebentar...'
    DialogOptions.ShowProgressBar = True
    Left = 376
    Top = 376
  end
  object qryCekTps: TZQuery
    Params = <>
    Left = 776
    Top = 8
  end
  object threadCek: TJvThread
    Exclusive = True
    MaxCount = 0
    RunOnCreate = True
    FreeOnTerminate = True
    OnExecute = threadCekExecute
    OnFinishAll = threadCekFinishAll
    Left = 328
    Top = 376
  end
  object threadDialogCek: TJvThreadSimpleDialog
    DialogOptions.FormStyle = fsNormal
    DialogOptions.ShowDialog = True
    DialogOptions.CancelButtonCaption = 'Cancel'
    DialogOptions.Caption = 'Preview Excel'
    DialogOptions.EnableCancelButton = False
    DialogOptions.InfoText = 'Mengecek, harap tunggu sebentar...'
    DialogOptions.ShowProgressBar = True
    Left = 408
    Top = 376
  end
end
